home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / keyservh / iservice.cls < prev    next >
Encoding:
Visual Basic class definition  |  1999-08-19  |  1.6 KB  |  71 lines
  1. VERSION 1.0 CLASS
  2. BEGIN
  3.   MultiUse = -1  'True
  4.   Persistable = 0  'NotPersistable
  5.   DataBindingBehavior = 0  'vbNone
  6.   DataSourceBehavior  = 0  'vbNone
  7.   MTSTransactionMode  = 0  'NotAnMTSObject
  8. END
  9. Attribute VB_Name = "IService"
  10. Attribute VB_GlobalNameSpace = False
  11. Attribute VB_Creatable = True
  12. Attribute VB_PredeclaredId = False
  13. Attribute VB_Exposed = True
  14. '****************************************************************************************************
  15. '   Copyright (c) Key Technology Pty Ltd 1999, All Rights Reserved.
  16. '   Web site: http://www.keytech.com.au  Email: info@keytech.com.au
  17. '****************************************************************************************************
  18.  
  19. Option Explicit
  20.  
  21. '
  22. ' Return true if the service supports pause and continue operations
  23. '
  24. Public Property Get Pausable() As Boolean
  25.  
  26. End Property
  27.  
  28. '
  29. ' This method is called when the service is started.
  30. ' It should initiate the service work and then return promptly.
  31. '
  32. Public Sub OnStart()
  33.  
  34. End Sub
  35.  
  36. '
  37. ' This method is called when the service is being stopped.
  38. ' It should terminate the service work and then return promptly.
  39. '
  40. Public Sub OnStop()
  41.  
  42. End Sub
  43.  
  44. '
  45. ' This method is called when the service is being paused.
  46. '
  47. Public Sub OnPause()
  48.  
  49. End Sub
  50.  
  51. '
  52. ' This method is called when the service is being continued.
  53. '
  54. Public Sub OnContinue()
  55.  
  56. End Sub
  57.  
  58. '
  59. ' This method is called whenever a service specific control is sent.
  60. '
  61. Public Sub OnControl(ByVal OpCode As Long)
  62.  
  63. End Sub
  64.  
  65. '
  66. ' This method is called when the system is being shutdown.
  67. '
  68. Public Sub OnShutdown()
  69.  
  70. End Sub
  71.